home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ Scandisk on Boot.xpl < prev    next >
Text File  |  2003-11-19  |  2KB  |  57 lines

  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="5"
  3. "COUNT"="1"
  4. "UIPATH 1"="Startup/Shutdown\Startup\Run on Next Boot"
  5. "UIPATH 2"="Startup/Shutdown\Startup\Windows 9x/ME\30) ScanDisk"
  6. "NAME"="Run Scandisk on Next Boot"
  7. "VERSION"="1.16"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Run Scandisk on Next Boot"
  10. "DESCRIPTION 1"="Often the Scandisk operation is interrupted by other disk/program activity."
  11. "DESCRIPTION 2"="If both the Scandisk and Defrag on Boot options are selected, scandisk will run before defrag."
  12. "DESCRIPTION 3"="Checking the box will cause Scandisk to start on Bootup; if Scandisk is not desired on boot, it may be stopped after boot."
  13. "DESCRIPTION 4"="NOTE #1: This plugin is designed to run only on the next restart; whenever you want to run Scandisk on boot, re-apply the plugin." 
  14. "DESCRIPTION 5"="NOTE #2: On Windows 2000 and Windows NT, this will run CHKDSK rather than ScanDisk because those operating systems do not have ScanDisk."
  15. "AUTHOR"="Ojatex@aol.com"
  16. "CONTACTURL"="http://members.aol.com/ojatex/"
  17. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  18. "COMMENT 1"=" "
  19.  
  20.  
  21. sP="HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnceEx\"
  22. sV1="A ScanDisk\"
  23. v="Title" 'Stg
  24. v1="Flags" 'Dwrd
  25. v2="Cmd" 'Stg
  26.  
  27.  
  28. Sub Plugin_Initialize 
  29. End Sub
  30.  
  31.  
  32. Sub Plugin_CheckData(ElementIndex)
  33. End Sub
  34.  
  35. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  36.   if ElementIndex=1 then
  37.      If GetWinVer=1 or GetWinVer=3 or GetWinVer=5 then 
  38.         Call RegWriteValue(sP&v,"ScanDisk at Startup",1)
  39.         Call RegWriteValue(sP&v1,"3",2)
  40.         Call RegWriteValue(sp&sv1&v2,"SCANDSKW.EXE /A",1)
  41.      else 'NT
  42.         Call RegWriteValue(sP&v,"Chkdsk at Startup",1)
  43.         Call RegWriteValue(sP&v1,"3",2)
  44.         Call RegWriteValue(sp&sv1&v2,"CHKDSK.EXE /F",1)
  45.      end if
  46.  
  47.      Call Restart()
  48.   end if
  49. End Sub
  50.  
  51. Sub Plugin_Terminate 
  52. End Sub
  53.  
  54.  
  55.  
  56.  
  57.